From: John Paul Wallington <jpw@pobox.com>
Date: Tue, 20 Apr 2004 00:17:46 +0000 (+0000)
Subject: (Fassoc, Feql): Fix indentation.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~23082
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=767de5c96fc31a8a190fe844f8b11ff0ba6bf144;p=emacs.git

(Fassoc, Feql): Fix indentation.
---

diff --git a/src/fns.c b/src/fns.c
index 3076a000992..bb215317864 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1560,7 +1560,7 @@ assq_no_quit (key, list)
 DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0,
        doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST.
 The value is actually the first element of LIST whose car equals KEY.  */)
-       (key, list)
+     (key, list)
      Lisp_Object key, list;
 {
   Lisp_Object result, car;
@@ -2138,7 +2138,7 @@ The PLIST is modified by side effects.  */)
 DEFUN ("eql", Feql, Seql, 2, 2, 0,
        doc: /* Return t if the two args are the same Lisp object.
 Floating-point numbers of equal value are `eql', but they may not be `eq'.  */)
-  (obj1, obj2)
+     (obj1, obj2)
      Lisp_Object obj1, obj2;
 {
   if (FLOATP (obj1))